home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The School House•
/
Math Factory™ Demo •••••
/
Math Factory™ Demo •••••.rsrc
/
CODE_32.txt
< prev
next >
Wrap
Text File
|
1988-01-30
|
42KB
|
742 lines
# near model CODE resource
# jump table entries: 816-821 (6 of them)
00000000 0000 0000 ori.b D0, 0x0
export_102:
00000004 4E56 0000 link A6, 0
00000008 4A6D E852 tst.w [A5 - 0x17AE]
0000000C 6F00 0064 ble +0x66 /* 00000072 */
00000010 302D E852 move.w D0, [A5 - 0x17AE]
00000014 5340 subq.w D0, 1
00000016 3B40 E852 move.w [A5 - 0x17AE], D0
0000001A 0C6D 0040 FA34 cmpi.w [A5 - 0x5CC], 0x40 /* '@' */
00000020 6600 0022 bne +0x24 /* 00000044 */
00000024 302D E852 move.w D0, [A5 - 0x17AE]
00000028 5240 addq.w D0, 1
0000002A E348 lsl D0.w, 1
0000002C 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
00000030 0C70 003D 0000 cmpi.w [A0 + D0.w], 0x3D /* '=' */
00000036 6600 000C bne +0xE /* 00000044 */
0000003A 302D E852 move.w D0, [A5 - 0x17AE]
0000003E 5340 subq.w D0, 1
00000040 3B40 E852 move.w [A5 - 0x17AE], D0
label00000044:
00000044 0C6D 002F FA34 cmpi.w [A5 - 0x5CC], 0x2F /* '/' */
0000004A 6600 0022 bne +0x24 /* 0000006E */
0000004E 302D E852 move.w D0, [A5 - 0x17AE]
00000052 5240 addq.w D0, 1
00000054 E348 lsl D0.w, 1
00000056 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
0000005A 0C70 0072 0000 cmpi.w [A0 + D0.w], 0x72 /* 'r' */
00000060 6600 000C bne +0xE /* 0000006E */
00000064 302D E852 move.w D0, [A5 - 0x17AE]
00000068 5340 subq.w D0, 1
0000006A 3B40 E852 move.w [A5 - 0x17AE], D0
label0000006E:
0000006E 6000 0008 bra +0xA /* 00000078 */
label00000072:
00000072 3F3C 0001 move.w -[A7], 0x1
00000076 A9C8 syscall SysBeep
label00000078:
00000078 4E5E unlink A6
0000007A 4E75 rts
0000007C 0000 0000 ori.b D0, 0x0
export_103:
00000080 4E56 0000 link A6, 0
00000084 302D E2D6 move.w D0, [A5 - 0x1D2A]
00000088 5340 subq.w D0, 1
0000008A B06D E852 cmp.w D0, [A5 - 0x17AE]
0000008E 6F00 0064 ble +0x66 /* 000000F4 */
00000092 302D E852 move.w D0, [A5 - 0x17AE]
00000096 5240 addq.w D0, 1
00000098 3B40 E852 move.w [A5 - 0x17AE], D0
0000009C 0C6D 0040 FA34 cmpi.w [A5 - 0x5CC], 0x40 /* '@' */
000000A2 6600 0022 bne +0x24 /* 000000C6 */
000000A6 302D E852 move.w D0, [A5 - 0x17AE]
000000AA 5240 addq.w D0, 1
000000AC E348 lsl D0.w, 1
000000AE 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
000000B2 0C70 003D 0000 cmpi.w [A0 + D0.w], 0x3D /* '=' */
000000B8 6600 000C bne +0xE /* 000000C6 */
000000BC 302D E852 move.w D0, [A5 - 0x17AE]
000000C0 5240 addq.w D0, 1
000000C2 3B40 E852 move.w [A5 - 0x17AE], D0
label000000C6:
000000C6 0C6D 002F FA34 cmpi.w [A5 - 0x5CC], 0x2F /* '/' */
000000CC 6600 0022 bne +0x24 /* 000000F0 */
000000D0 302D E852 move.w D0, [A5 - 0x17AE]
000000D4 5240 addq.w D0, 1
000000D6 E348 lsl D0.w, 1
000000D8 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
000000DC 0C70 0072 0000 cmpi.w [A0 + D0.w], 0x72 /* 'r' */
000000E2 6600 000C bne +0xE /* 000000F0 */
000000E6 302D E852 move.w D0, [A5 - 0x17AE]
000000EA 5240 addq.w D0, 1
000000EC 3B40 E852 move.w [A5 - 0x17AE], D0
label000000F0:
000000F0 6000 0008 bra +0xA /* 000000FA */
label000000F4:
000000F4 3F3C 0001 move.w -[A7], 0x1
000000F8 A9C8 syscall SysBeep
label000000FA:
000000FA 4E5E unlink A6
000000FC 4E75 rts
export_104:
000000FE 4E56 FEEE link A6, -0x0112
00000102 48E7 1000 movem.l -[A7], D3
00000106 0C6D 002E FE3E cmpi.w [A5 - 0x1C2], 0x2E /* '.' */
0000010C 57C0 seq D0
0000010E 4400 neg.b D0
00000110 C02D EE1B and.b D0, [A5 - 0x11E5]
00000114 6700 00D2 beq +0xD4 /* 000001E8 */
00000118 2F07 move.l -[A7], D7
0000011A 7001 moveq.l D0, 0x01
0000011C 3E2D E2D6 move.w D7, [A5 - 0x1D2A]
00000120 9E40 sub.w D7, D0
00000122 6D00 005E blt +0x60 /* 00000182 */
00000126 3D40 FFF6 move.w [A6 - 0xA], D0
label0000012A:
0000012A 486E FFEE pea.l [A6 - 0x12]
0000012E 302E FFF6 move.w D0, [A6 - 0xA]
00000132 E748 lsl D0.w, 3
00000134 41ED E336 lea.l A0, [A5 - 0x1CCA]
00000138 3230 0000 move.w D1, [A0 + D0.w]
0000013C 5941 subq.w D1, 4
0000013E 3F01 move.w -[A7], D1
00000140 302E FFF6 move.w D0, [A6 - 0xA]
00000144 E748 lsl D0.w, 3
00000146 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000014A 3230 0000 move.w D1, [A0 + D0.w]
0000014E 5941 subq.w D1, 4
00000150 3F01 move.w -[A7], D1
00000152 302E FFF6 move.w D0, [A6 - 0xA]
00000156 E748 lsl D0.w, 3
00000158 41ED E336 lea.l A0, [A5 - 0x1CCA]
0000015C 3F30 0000 move.w -[A7], [A0 + D0.w]
00000160 302E FFF6 move.w D0, [A6 - 0xA]
00000164 E748 lsl D0.w, 3
00000166 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000016A 3F30 0000 move.w -[A7], [A0 + D0.w]
0000016E A8A7 syscall SetRect
00000170 486E FFEE pea.l [A6 - 0x12]
00000174 486D FFD6 pea.l [A5 - 0x2A]
00000178 A8BB syscall FillOval
0000017A 526E FFF6 addq.w [A6 - 0xA], 1
0000017E 51CF FFAA dbf D7, -0x58 /* 0000012A */
label00000182:
00000182 2E1F move.l D7, [A7]+
00000184 486D EE06 pea.l [A5 - 0x11FA]
00000188 302D E852 move.w D0, [A5 - 0x17AE]
0000018C 5240 addq.w D0, 1
0000018E E748 lsl D0.w, 3
00000190 41ED E336 lea.l A0, [A5 - 0x1CCA]
00000194 3230 0000 move.w D1, [A0 + D0.w]
00000198 5941 subq.w D1, 4
0000019A 3F01 move.w -[A7], D1
0000019C 302D E852 move.w D0, [A5 - 0x17AE]
000001A0 5240 addq.w D0, 1
000001A2 E748 lsl D0.w, 3
000001A4 41ED E338 lea.l A0, [A5 - 0x1CC8]
000001A8 3230 0000 move.w D1, [A0 + D0.w]
000001AC 5941 subq.w D1, 4
000001AE 3F01 move.w -[A7], D1
000001B0 302D E852 move.w D0, [A5 - 0x17AE]
000001B4 5240 addq.w D0, 1
000001B6 E748 lsl D0.w, 3
000001B8 41ED E336 lea.l A0, [A5 - 0x1CCA]
000001BC 3F30 0000 move.w -[A7], [A0 + D0.w]
000001C0 302D E852 move.w D0, [A5 - 0x17AE]
000001C4 5240 addq.w D0, 1
000001C6 E748 lsl D0.w, 3
000001C8 41ED E338 lea.l A0, [A5 - 0x1CC8]
000001CC 3F30 0000 move.w -[A7], [A0 + D0.w]
000001D0 A8A7 syscall SetRect
000001D2 486D EE06 pea.l [A5 - 0x11FA]
000001D6 A8B9 syscall EraseOval
000001D8 302D E852 move.w D0, [A5 - 0x17AE]
000001DC 5240 addq.w D0, 1
000001DE 48C0 ext.l D0
000001E0 2B40 EE0E move.l [A5 - 0x11F2], D0
000001E4 6000 04EC bra +0x4EE /* 000006D2 */
label000001E8:
000001E8 0C6D 002F FA34 cmpi.w [A5 - 0x5CC], 0x2F /* '/' */
000001EE 6600 0006 bne +0x8 /* 000001F6 */
000001F2 4EAD 034A jsr [A5 + 0x34A /* export_101 */]
label000001F6:
000001F6 0C6D 0078 FA34 cmpi.w [A5 - 0x5CC], 0x78 /* 'x' */
000001FC 6600 0130 bne +0x132 /* 0000032E */
00000200 302D E9C6 move.w D0, [A5 - 0x163A]
00000204 C1FC 0016 muls.w D0, 0x16
00000208 7200 moveq.l D1, 0x00
0000020A 41ED F41A lea.l A0, [A5 - 0xBE6]
0000020E 1230 0000 move.b D1, [A0 + D0.w]
00000212 3D41 FFFC move.w [A6 - 0x4], D1
00000216 302D E9C6 move.w D0, [A5 - 0x163A]
0000021A C1FC 0016 muls.w D0, 0x16
0000021E 7200 moveq.l D1, 0x00
00000220 41ED EE16 lea.l A0, [A5 - 0x11EA]
00000224 1230 0000 move.b D1, [A0 + D0.w]
00000228 3D41 FFFA move.w [A6 - 0x6], D1
0000022C 0C6D 0078 FA34 cmpi.w [A5 - 0x5CC], 0x78 /* 'x' */
00000232 57C0 seq D0
00000234 4400 neg.b D0
00000236 0C6E 0001 FFFA cmpi.w [A6 - 0x6], 0x1
0000023C 5EC1 sgt D1
0000023E 4401 neg.b D1
00000240 C001 and.b D0, D1
00000242 6700 00EA beq +0xEC /* 0000032E */
00000246 302E FFFA move.w D0, [A6 - 0x6]
0000024A 0C40 0002 cmpi.w D0, 0x2
0000024E 6600 000C bne +0xE /* 0000025C */
00000252 3D7C 00CA FFF8 move.w [A6 - 0x8], 0xCA
00000258 6000 0010 bra +0x12 /* 0000026A */
label0000025C:
0000025C 0C40 0003 cmpi.w D0, 0x3
00000260 6600 0008 bne +0xA /* 0000026A */
00000264 3D7C 00E0 FFF8 move.w [A6 - 0x8], 0xE0
label0000026A:
0000026A 302D E852 move.w D0, [A5 - 0x17AE]
0000026E 5440 addq.w D0, 2
00000270 E748 lsl D0.w, 3
00000272 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000276 3230 0000 move.w D1, [A0 + D0.w]
0000027A B26E FFF8 cmp.w D1, [A6 - 0x8]
0000027E 57C0 seq D0
00000280 4400 neg.b D0
00000282 4A2D E2CB tst.b [A5 - 0x1D35]
00000286 57C1 seq D1
00000288 4401 neg.b D1
0000028A C001 and.b D0, D1
0000028C 6700 00A0 beq +0xA2 /* 0000032E */
00000290 426E FFFE clr.w [A6 - 0x2]
00000294 2F07 move.l -[A7], D7
00000296 7001 moveq.l D0, 0x01
00000298 3E2D E2D6 move.w D7, [A5 - 0x1D2A]
0000029C 9E40 sub.w D7, D0
0000029E 6D00 0032 blt +0x34 /* 000002D2 */
000002A2 3D40 FFF6 move.w [A6 - 0xA], D0
label000002A6:
000002A6 302E FFF6 move.w D0, [A6 - 0xA]
000002AA E748 lsl D0.w, 3
000002AC 322E FFF8 move.w D1, [A6 - 0x8]
000002B0 0441 0016 subi.w D1, 0x16
000002B4 41ED E338 lea.l A0, [A5 - 0x1CC8]
000002B8 B270 0000 cmp.w D1, [A0 + D0.w]
000002BC 6600 000C bne +0xE /* 000002CA */
000002C0 302E FFFE move.w D0, [A6 - 0x2]
000002C4 5240 addq.w D0, 1
000002C6 3D40 FFFE move.w [A6 - 0x2], D0
label000002CA:
000002CA 526E FFF6 addq.w [A6 - 0xA], 1
000002CE 51CF FFD6 dbf D7, -0x2C /* 000002A6 */
label000002D2:
000002D2 2E1F move.l D7, [A7]+
000002D4 1B7C 0001 E2CB move.b [A5 - 0x1D35], 0x1
000002DA 3F3C 0002 move.w -[A7], 0x2
000002DE 3F3C 0002 move.w -[A7], 0x2
000002E2 A89B syscall PenSize
000002E4 3F3C 000B move.w -[A7], 0xB
000002E8 A89C syscall PenMode
000002EA 302E FFFC move.w D0, [A6 - 0x4]
000002EE 5840 addq.w D0, 4
000002F0 C1FC 0014 muls.w D0, 0x14
000002F4 D06D E4CE add.w D0, [A5 - 0x1B32]
000002F8 322E FFFE move.w D1, [A6 - 0x2]
000002FC C3FC 0014 muls.w D1, 0x14
00000300 9041 sub.w D0, D1
00000302 3F00 move.w -[A7], D0
00000304 302E FFF8 move.w D0, [A6 - 0x8]
00000308 0440 0016 subi.w D0, 0x16
0000030C 3F00 move.w -[A7], D0
0000030E A893 syscall MoveTo
00000310 302E FFFC move.w D0, [A6 - 0x4]
00000314 5840 addq.w D0, 4
00000316 C1FC 0014 muls.w D0, 0x14
0000031A D06D E4CE add.w D0, [A5 - 0x1B32]
0000031E 3F00 move.w -[A7], D0
00000320 302E FFF8 move.w D0, [A6 - 0x8]
00000324 0440 0016 subi.w D0, 0x16
00000328 3F00 move.w -[A7], D0
0000032A A891 syscall LineTo
0000032C A89E syscall PenNormal
label0000032E:
0000032E 302D E852 move.w D0, [A5 - 0x17AE]
00000332 5240 addq.w D0, 1
00000334 E748 lsl D0.w, 3
00000336 41ED E336 lea.l A0, [A5 - 0x1CCA]
0000033A 3F30 0000 move.w -[A7], [A0 + D0.w]
0000033E 302D E852 move.w D0, [A5 - 0x17AE]
00000342 5240 addq.w D0, 1
00000344 E748 lsl D0.w, 3
00000346 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000034A 3230 0000 move.w D1, [A0 + D0.w]
0000034E 5541 subq.w D1, 2
00000350 3F01 move.w -[A7], D1
00000352 A893 syscall MoveTo
00000354 302D E852 move.w D0, [A5 - 0x17AE]
00000358 5240 addq.w D0, 1
0000035A E748 lsl D0.w, 3
0000035C 41ED E334 lea.l A0, [A5 - 0x1CCC]
00000360 4870 0000 pea.l [A0 + D0.w]
00000364 486D FFD6 pea.l [A5 - 0x2A]
00000368 A8A5 syscall FillRect
0000036A 302D E852 move.w D0, [A5 - 0x17AE]
0000036E 5240 addq.w D0, 1
00000370 3B40 E852 move.w [A5 - 0x17AE], D0
00000374 0C6D 0072 FE3E cmpi.w [A5 - 0x1C2], 0x72 /* 'r' */
0000037A 57C0 seq D0
0000037C 4400 neg.b D0
0000037E 0C6D 002F FA34 cmpi.w [A5 - 0x5CC], 0x2F /* '/' */
00000384 57C1 seq D1
00000386 4401 neg.b D1
00000388 C001 and.b D0, D1
0000038A 6700 0018 beq +0x1A /* 000003A4 */
0000038E 302D E852 move.w D0, [A5 - 0x17AE]
00000392 E548 lsl D0.w, 2
00000394 43ED E854 lea.l A1, [A5 - 0x17AC]
00000398 23BC 0000 000A 0000 move.l [A1 + D0.w], 0xA /* '\n' */
000003A0 6000 0028 bra +0x2A /* 000003CA */
label000003A4:
000003A4 302D FE3E move.w D0, [A5 - 0x1C2]
000003A8 0240 00FF andi.w D0, 0xFF
000003AC 0040 0100 ori.w D0, 0x100
000003B0 3D40 FEEE move.w [A6 - 0x112], D0
000003B4 486E FEEE pea.l [A6 - 0x112]
000003B8 302D E852 move.w D0, [A5 - 0x17AE]
000003BC E548 lsl D0.w, 2
000003BE 41ED E854 lea.l A0, [A5 - 0x17AC]
000003C2 4870 0000 pea.l [A0 + D0.w]
000003C6 4EAD 00B2 jsr [A5 + 0xB2 /* export_18 */]
label000003CA:
000003CA 302D E852 move.w D0, [A5 - 0x17AE]
000003CE B06D E2D6 cmp.w D0, [A5 - 0x1D2A]
000003D2 6600 002E bne +0x30 /* 00000402 */
000003D6 302D E2D6 move.w D0, [A5 - 0x1D2A]
000003DA E748 lsl D0.w, 3
000003DC 41ED E336 lea.l A0, [A5 - 0x1CCA]
000003E0 3F30 0000 move.w -[A7], [A0 + D0.w]
000003E4 302D E2D6 move.w D0, [A5 - 0x1D2A]
000003E8 E748 lsl D0.w, 3
000003EA 41ED E338 lea.l A0, [A5 - 0x1CC8]
000003EE 3230 0000 move.w D1, [A0 + D0.w]
000003F2 5541 subq.w D1, 2
000003F4 3F01 move.w -[A7], D1
000003F6 A893 syscall MoveTo
000003F8 302D E2D6 move.w D0, [A5 - 0x1D2A]
000003FC 5340 subq.w D0, 1
000003FE 3B40 E852 move.w [A5 - 0x17AE], D0
label00000402:
00000402 3F2D FE3E move.w -[A7], [A5 - 0x1C2]
00000406 A883 syscall DrawChar
00000408 0C6D 0040 FA34 cmpi.w [A5 - 0x5CC], 0x40 /* '@' */
0000040E 6600 02C2 bne +0x2C4 /* 000006D2 */
00000412 302D E852 move.w D0, [A5 - 0x17AE]
00000416 5240 addq.w D0, 1
00000418 E348 lsl D0.w, 1
0000041A 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
0000041E 0C70 003D 0000 cmpi.w [A0 + D0.w], 0x3D /* '=' */
00000424 6600 02AC bne +0x2AE /* 000006D2 */
00000428 4A2D E2CA tst.b [A5 - 0x1D36]
0000042C 6700 0194 beq +0x196 /* 000005C2 */
00000430 302D E852 move.w D0, [A5 - 0x17AE]
00000434 5240 addq.w D0, 1
00000436 E748 lsl D0.w, 3
00000438 41ED E336 lea.l A0, [A5 - 0x1CCA]
0000043C 3F30 0000 move.w -[A7], [A0 + D0.w]
00000440 302D E852 move.w D0, [A5 - 0x17AE]
00000444 5240 addq.w D0, 1
00000446 E748 lsl D0.w, 3
00000448 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000044C 3230 0000 move.w D1, [A0 + D0.w]
00000450 5541 subq.w D1, 2
00000452 3F01 move.w -[A7], D1
00000454 A893 syscall MoveTo
00000456 302D E852 move.w D0, [A5 - 0x17AE]
0000045A 5240 addq.w D0, 1
0000045C E748 lsl D0.w, 3
0000045E 41ED E334 lea.l A0, [A5 - 0x1CCC]
00000462 4870 0000 pea.l [A0 + D0.w]
00000466 486D FFD6 pea.l [A5 - 0x2A]
0000046A A8A5 syscall FillRect
0000046C 3F3C 003D move.w -[A7], 0x3D /* '=' */
00000470 A883 syscall DrawChar
00000472 302D E852 move.w D0, [A5 - 0x17AE]
00000476 5240 addq.w D0, 1
00000478 3B40 E852 move.w [A5 - 0x17AE], D0
0000047C 302D E852 move.w D0, [A5 - 0x17AE]
00000480 E548 lsl D0.w, 2
00000482 43ED E854 lea.l A1, [A5 - 0x17AC]
00000486 23BC 0000 000B 0000 move.l [A1 + D0.w], 0xB
0000048E 3F3C 0002 move.w -[A7], 0x2
00000492 3F3C 0002 move.w -[A7], 0x2
00000496 A89B syscall PenSize
00000498 3F3C 000B move.w -[A7], 0xB
0000049C A89C syscall PenMode
0000049E 302D E852 move.w D0, [A5 - 0x17AE]
000004A2 5440 addq.w D0, 2
000004A4 E748 lsl D0.w, 3
000004A6 41ED E336 lea.l A0, [A5 - 0x1CCA]
000004AA 3F30 0000 move.w -[A7], [A0 + D0.w]
000004AE 302D E852 move.w D0, [A5 - 0x17AE]
000004B2 5440 addq.w D0, 2
000004B4 E748 lsl D0.w, 3
000004B6 41ED E338 lea.l A0, [A5 - 0x1CC8]
000004BA 3230 0000 move.w D1, [A0 + D0.w]
000004BE 0441 0016 subi.w D1, 0x16
000004C2 3F01 move.w -[A7], D1
000004C4 A893 syscall MoveTo
000004C6 302D E852 move.w D0, [A5 - 0x17AE]
000004CA 5440 addq.w D0, 2
000004CC E748 lsl D0.w, 3
000004CE 322D E852 move.w D1, [A5 - 0x17AE]
000004D2 5641 addq.w D1, 3
000004D4 E749 lsl D1.w, 3
000004D6 41ED E338 lea.l A0, [A5 - 0x1CC8]
000004DA 3430 0000 move.w D2, [A0 + D0.w]
000004DE 41ED E338 lea.l A0, [A5 - 0x1CC8]
000004E2 B470 1000 cmp.w D2, [A0 + D1.w]
000004E6 57C0 seq D0
000004E8 4400 neg.b D0
000004EA 322D E852 move.w D1, [A5 - 0x17AE]
000004EE 5641 addq.w D1, 3
000004F0 E749 lsl D1.w, 3
000004F2 342D E852 move.w D2, [A5 - 0x17AE]
000004F6 5842 addq.w D2, 4
000004F8 E74A lsl D2.w, 3
000004FA 41ED E338 lea.l A0, [A5 - 0x1CC8]
000004FE 3630 1000 move.w D3, [A0 + D1.w]
00000502 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000506 B670 2000 cmp.w D3, [A0 + D2.w]
0000050A 57C1 seq D1
0000050C 4401 neg.b D1
0000050E C001 and.b D0, D1
00000510 6700 0032 beq +0x34 /* 00000544 */
00000514 302D E852 move.w D0, [A5 - 0x17AE]
00000518 5840 addq.w D0, 4
0000051A E748 lsl D0.w, 3
0000051C 41ED E33A lea.l A0, [A5 - 0x1CC6]
00000520 3230 0000 move.w D1, [A0 + D0.w]
00000524 5541 subq.w D1, 2
00000526 3F01 move.w -[A7], D1
00000528 302D E852 move.w D0, [A5 - 0x17AE]
0000052C 5840 addq.w D0, 4
0000052E E748 lsl D0.w, 3
00000530 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000534 3230 0000 move.w D1, [A0 + D0.w]
00000538 0441 0016 subi.w D1, 0x16
0000053C 3F01 move.w -[A7], D1
0000053E A891 syscall LineTo
00000540 6000 007A bra +0x7C /* 000005BC */
label00000544:
00000544 302D E852 move.w D0, [A5 - 0x17AE]
00000548 5440 addq.w D0, 2
0000054A E748 lsl D0.w, 3
0000054C 322D E852 move.w D1, [A5 - 0x17AE]
00000550 5641 addq.w D1, 3
00000552 E749 lsl D1.w, 3
00000554 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000558 3430 0000 move.w D2, [A0 + D0.w]
0000055C 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000560 B470 1000 cmp.w D2, [A0 + D1.w]
00000564 6600 002E bne +0x30 /* 00000594 */
00000568 302D E852 move.w D0, [A5 - 0x17AE]
0000056C 5640 addq.w D0, 3
0000056E E748 lsl D0.w, 3
00000570 41ED E33A lea.l A0, [A5 - 0x1CC6]
00000574 3F30 0000 move.w -[A7], [A0 + D0.w]
00000578 302D E852 move.w D0, [A5 - 0x17AE]
0000057C 5640 addq.w D0, 3
0000057E E748 lsl D0.w, 3
00000580 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000584 3230 0000 move.w D1, [A0 + D0.w]
00000588 0441 0016 subi.w D1, 0x16
0000058C 3F01 move.w -[A7], D1
0000058E A891 syscall LineTo
00000590 6000 002A bra +0x2C /* 000005BC */
label00000594:
00000594 302D E852 move.w D0, [A5 - 0x17AE]
00000598 5440 addq.w D0, 2
0000059A E748 lsl D0.w, 3
0000059C 41ED E33A lea.l A0, [A5 - 0x1CC6]
000005A0 3F30 0000 move.w -[A7], [A0 + D0.w]
000005A4 302D E852 move.w D0, [A5 - 0x17AE]
000005A8 5440 addq.w D0, 2
000005AA E748 lsl D0.w, 3
000005AC 41ED E338 lea.l A0, [A5 - 0x1CC8]
000005B0 3230 0000 move.w D1, [A0 + D0.w]
000005B4 0441 0016 subi.w D1, 0x16
000005B8 3F01 move.w -[A7], D1
000005BA A891 syscall LineTo
label000005BC:
000005BC A89E syscall PenNormal
000005BE 6000 0112 bra +0x114 /* 000006D2 */
label000005C2:
000005C2 302D E852 move.w D0, [A5 - 0x17AE]
000005C6 5240 addq.w D0, 1
000005C8 E748 lsl D0.w, 3
000005CA 41ED E336 lea.l A0, [A5 - 0x1CCA]
000005CE 3F30 0000 move.w -[A7], [A0 + D0.w]
000005D2 302D E852 move.w D0, [A5 - 0x17AE]
000005D6 5240 addq.w D0, 1
000005D8 E748 lsl D0.w, 3
000005DA 41ED E338 lea.l A0, [A5 - 0x1CC8]
000005DE 3230 0000 move.w D1, [A0 + D0.w]
000005E2 5541 subq.w D1, 2
000005E4 3F01 move.w -[A7], D1
000005E6 A893 syscall MoveTo
000005E8 302D E852 move.w D0, [A5 - 0x17AE]
000005EC 5240 addq.w D0, 1
000005EE E748 lsl D0.w, 3
000005F0 41ED E334 lea.l A0, [A5 - 0x1CCC]
000005F4 4870 0000 pea.l [A0 + D0.w]
000005F8 486D FFD6 pea.l [A5 - 0x2A]
000005FC A8A5 syscall FillRect
000005FE 3F3C 003D move.w -[A7], 0x3D /* '=' */
00000602 A883 syscall DrawChar
00000604 302D E852 move.w D0, [A5 - 0x17AE]
00000608 5240 addq.w D0, 1
0000060A 3B40 E852 move.w [A5 - 0x17AE], D0
0000060E 302D E852 move.w D0, [A5 - 0x17AE]
00000612 E548 lsl D0.w, 2
00000614 43ED E854 lea.l A1, [A5 - 0x17AC]
00000618 23BC 0000 000B 0000 move.l [A1 + D0.w], 0xB
00000620 3F3C 0002 move.w -[A7], 0x2
00000624 3F3C 0002 move.w -[A7], 0x2
00000628 A89B syscall PenSize
0000062A 3F3C 000B move.w -[A7], 0xB
0000062E A89C syscall PenMode
00000630 302D E852 move.w D0, [A5 - 0x17AE]
00000634 5240 addq.w D0, 1
00000636 E748 lsl D0.w, 3
00000638 41ED E336 lea.l A0, [A5 - 0x1CCA]
0000063C 3F30 0000 move.w -[A7], [A0 + D0.w]
00000640 302D E852 move.w D0, [A5 - 0x17AE]
00000644 5240 addq.w D0, 1
00000646 E748 lsl D0.w, 3
00000648 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000064C 3230 0000 move.w D1, [A0 + D0.w]
00000650 0441 0016 subi.w D1, 0x16
00000654 3F01 move.w -[A7], D1
00000656 A893 syscall MoveTo
00000658 302D E852 move.w D0, [A5 - 0x17AE]
0000065C 5240 addq.w D0, 1
0000065E E748 lsl D0.w, 3
00000660 322D E852 move.w D1, [A5 - 0x17AE]
00000664 5441 addq.w D1, 2
00000666 E749 lsl D1.w, 3
00000668 41ED E338 lea.l A0, [A5 - 0x1CC8]
0000066C 3430 0000 move.w D2, [A0 + D0.w]
00000670 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000674 B470 1000 cmp.w D2, [A0 + D1.w]
00000678 6600 002E bne +0x30 /* 000006A8 */
0000067C 302D E852 move.w D0, [A5 - 0x17AE]
00000680 5440 addq.w D0, 2
00000682 E748 lsl D0.w, 3
00000684 41ED E33A lea.l A0, [A5 - 0x1CC6]
00000688 3F30 0000 move.w -[A7], [A0 + D0.w]
0000068C 302D E852 move.w D0, [A5 - 0x17AE]
00000690 5440 addq.w D0, 2
00000692 E748 lsl D0.w, 3
00000694 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000698 3230 0000 move.w D1, [A0 + D0.w]
0000069C 0441 0016 subi.w D1, 0x16
000006A0 3F01 move.w -[A7], D1
000006A2 A891 syscall LineTo
000006A4 6000 002A bra +0x2C /* 000006D0 */
label000006A8:
000006A8 302D E852 move.w D0, [A5 - 0x17AE]
000006AC 5240 addq.w D0, 1
000006AE E748 lsl D0.w, 3
000006B0 41ED E33A lea.l A0, [A5 - 0x1CC6]
000006B4 3F30 0000 move.w -[A7], [A0 + D0.w]
000006B8 302D E852 move.w D0, [A5 - 0x17AE]
000006BC 5240 addq.w D0, 1
000006BE E748 lsl D0.w, 3
000006C0 41ED E338 lea.l A0, [A5 - 0x1CC8]
000006C4 3230 0000 move.w D1, [A0 + D0.w]
000006C8 0441 0016 subi.w D1, 0x16
000006CC 3F01 move.w -[A7], D1
000006CE A891 syscall LineTo
label000006D0:
000006D0 A89E syscall PenNormal
label000006D2:
000006D2 302D E852 move.w D0, [A5 - 0x17AE]
000006D6 5240 addq.w D0, 1
000006D8 E348 lsl D0.w, 1
000006DA 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
000006DE 0C70 0072 0000 cmpi.w [A0 + D0.w], 0x72 /* 'r' */
000006E4 57C0 seq D0
000006E6 4400 neg.b D0
000006E8 0C6D 002F FA34 cmpi.w [A5 - 0x5CC], 0x2F /* '/' */
000006EE 57C1 seq D1
000006F0 4401 neg.b D1
000006F2 C001 and.b D0, D1
000006F4 6700 006E beq +0x70 /* 00000764 */
000006F8 302D E852 move.w D0, [A5 - 0x17AE]
000006FC 5240 addq.w D0, 1
000006FE E748 lsl D0.w, 3
00000700 41ED E336 lea.l A0, [A5 - 0x1CCA]
00000704 3F30 0000 move.w -[A7], [A0 + D0.w]
00000708 302D E852 move.w D0, [A5 - 0x17AE]
0000070C 5240 addq.w D0, 1
0000070E E748 lsl D0.w, 3
00000710 41ED E338 lea.l A0, [A5 - 0x1CC8]
00000714 3230 0000 move.w D1, [A0 + D0.w]
00000718 5541 subq.w D1, 2
0000071A 3F01 move.w -[A7], D1
0000071C A893 syscall MoveTo
0000071E 302D E852 move.w D0, [A5 - 0x17AE]
00000722 5240 addq.w D0, 1
00000724 E748 lsl D0.w, 3
00000726 41ED E334 lea.l A0, [A5 - 0x1CCC]
0000072A 4870 0000 pea.l [A0 + D0.w]
0000072E 486D FFD6 pea.l [A5 - 0x2A]
00000732 A8A5 syscall FillRect
00000734 302D E852 move.w D0, [A5 - 0x17AE]
00000738 5240 addq.w D0, 1
0000073A E348 lsl D0.w, 1
0000073C 41ED E2D6 lea.l A0, [A5 - 0x1D2A]
00000740 3F30 0000 move.w -[A7], [A0 + D0.w]
00000744 A883 syscall DrawChar
00000746 302D E852 move.w D0, [A5 - 0x17AE]
0000074A 5240 addq.w D0, 1
0000074C E548 lsl D0.w, 2
0000074E 43ED E854 lea.l A1, [A5 - 0x17AC]
00000752 23BC 0000 000A 0000 move.l [A1 + D0.w], 0xA /* '\n' */
0000075A 302D E852 move.w D0, [A5 - 0x17AE]
0000075E 5240 addq.w D0, 1
00000760 3B40 E852 move.w [A5 - 0x17AE], D0
label00000764:
00000764 4CDF 0008 movem.l D3, [A7]+
00000768 4E5E unlink A6
0000076A 4E75 rts
0000076C 0000 0000 ori.b D0, 0x0
export_105:
00000770 4E56 0000 link A6, 0
00000774 302D FA34 move.w D0, [A5 - 0x5CC]
00000778 0C40 002B cmpi.w D0, 0x2B /* '+' */
0000077C 6600 000C bne +0xE /* 0000078A */
00000780 1B7C 0001 E851 move.b [A5 - 0x17AF], 0x1
00000786 6000 0042 bra +0x44 /* 000007CA */
label0000078A:
0000078A 0C40 002D cmpi.w D0, 0x2D /* '-' */
0000078E 6600 0014 bne +0x16 /* 000007A4 */
00000792 3F3C 0001 move.w -[A7], 0x1
00000796 4EAD 0342 jsr [A5 + 0x342 /* export_100 */]
0000079A 1B7C 0001 E851 move.b [A5 - 0x17AF], 0x1
000007A0 6000 0028 bra +0x2A /* 000007CA */
label000007A4:
000007A4 0C40 0078 cmpi.w D0, 0x78 /* 'x' */
000007A8 6600 000C bne +0xE /* 000007B6 */
000007AC 1B7C 0001 E851 move.b [A5 - 0x17AF], 0x1
000007B2 6000 0016 bra +0x18 /* 000007CA */
label000007B6:
000007B6 0C40 002F cmpi.w D0, 0x2F /* '/' */
000007BA 6600 0006 bne +0x8 /* 000007C2 */
000007BE 6000 000A bra +0xC /* 000007CA */
label000007C2:
000007C2 0C40 0040 cmpi.w D0, 0x40 /* '@' */
000007C6 6600 0002 bne +0x4 /* 000007CA */
label000007CA:
000007CA 4E5E unlink A6
000007CC 4E75 rts
000007CE 0000 0000 ori.b D0, 0x0
export_106:
000007D2 4E56 0000 link A6, 0
000007D6 4EAD 031A jsr [A5 + 0x31A /* export_95 */]
000007DA 4E5E unlink A6
000007DC 4E75 rts
000007DE 0000 0000 ori.b D0, 0x0
export_107:
000007E2 4E56 FFFA link A6, -0x0006
000007E6 422E FFFB clr.b [A6 - 0x5]
000007EA 0C6D 0008 FE3E cmpi.w [A5 - 0x1C2], 0x8
000007F0 6600 0006 bne +0x8 /* 000007F8 */
000007F4 4EAD 0352 jsr [A5 + 0x352 /* export_102 */]
label000007F8:
000007F8 0C6D 0066 FE3E cmpi.w [A5 - 0x1C2], 0x66 /* 'f' */
000007FE 57C0 seq D0
00000800 4400 neg.b D0
00000802 0C6D 0046 FE3E cmpi.w [A5 - 0x1C2], 0x46 /* 'F' */
00000808 57C1 seq D1
0000080A 4401 neg.b D1
0000080C 8001 or.b D0, D1
0000080E 6700 0006 beq +0x8 /* 00000816 */
00000812 4EAD 035A jsr [A5 + 0x35A /* export_103 */]
label00000816:
00000816 0C6D 0030 FE3E cmpi.w [A5 - 0x1C2], 0x30 /* '0' */
0000081C 57C0 seq D0
0000081E 4400 neg.b D0
00000820 0C6D 0031 FE3E cmpi.w [A5 - 0x1C2], 0x31 /* '1' */
00000826 57C1 seq D1
00000828 4401 neg.b D1
0000082A 8001 or.b D0, D1
0000082C 0C6D 0032 FE3E cmpi.w [A5 - 0x1C2], 0x32 /* '2' */
00000832 57C1 seq D1
00000834 4401 neg.b D1
00000836 8001 or.b D0, D1
00000838 0C6D 0033 FE3E cmpi.w [A5 - 0x1C2], 0x33 /* '3' */
0000083E 57C1 seq D1
00000840 4401 neg.b D1
00000842 8001 or.b D0, D1
00000844 0C6D 0034 FE3E cmpi.w [A5 - 0x1C2], 0x34 /* '4' */
0000084A 57C1 seq D1
0000084C 4401 neg.b D1
0000084E 8001 or.b D0, D1
00000850 0C6D 0035 FE3E cmpi.w [A5 - 0x1C2], 0x35 /* '5' */
00000856 57C1 seq D1
00000858 4401 neg.b D1
0000085A 8001 or.b D0, D1
0000085C 0C6D 0036 FE3E cmpi.w [A5 - 0x1C2], 0x36 /* '6' */
00000862 57C1 seq D1
00000864 4401 neg.b D1
00000866 8001 or.b D0, D1
00000868 0C6D 0037 FE3E cmpi.w [A5 - 0x1C2], 0x37 /* '7' */
0000086E 57C1 seq D1
00000870 4401 neg.b D1
00000872 8001 or.b D0, D1
00000874 0C6D 0038 FE3E cmpi.w [A5 - 0x1C2], 0x38 /* '8' */
0000087A 57C1 seq D1
0000087C 4401 neg.b D1
0000087E 8001 or.b D0, D1
00000880 0C6D 0039 FE3E cmpi.w [A5 - 0x1C2], 0x39 /* '9' */
00000886 57C1 seq D1
00000888 4401 neg.b D1
0000088A 8001 or.b D0, D1
0000088C 6700 0008 beq +0xA /* 00000896 */
00000890 1D7C 0001 FFFB move.b [A6 - 0x5], 0x1
label00000896:
00000896 102D E851 move.b D0, [A5 - 0x17AF]
0000089A C02E FFFB and.b D0, [A6 - 0x5]
0000089E 6700 0020 beq +0x22 /* 000008C0 */
000008A2 0C6D 0078 FA34 cmpi.w [A5 - 0x5CC], 0x78 /* 'x' */
000008A8 6600 000A bne +0xC /* 000008B4 */
000008AC 4EAD 0322 jsr [A5 + 0x322 /* export_96 */]
000008B0 6000 0006 bra +0x8 /* 000008B8 */
label000008B4:
000008B4 4EAD 0332 jsr [A5 + 0x332 /* export_98 */]
label000008B8:
000008B8 422D E851 clr.b [A5 - 0x17AF]
000008BC 6000 0026 bra +0x28 /* 000008E4 */
label000008C0:
000008C0 0C6D 002E FE3E cmpi.w [A5 - 0x1C2], 0x2E /* '.' */
000008C6 57C0 seq D0
000008C8 4400 neg.b D0
000008CA C02D EE1B and.b D0, [A5 - 0x11E5]
000008CE 6700 0008 beq +0xA /* 000008D8 */
000008D2 1D7C 0001 FFFB move.b [A6 - 0x5], 0x1
label000008D8:
000008D8 4A2E FFFB tst.b [A6 - 0x5]
000008DC 6700 0006 beq +0x8 /* 000008E4 */
000008E0 4EAD 0362 jsr [A5 + 0x362 /* export_104 */]
label000008E4:
000008E4 0C6D 0020 FE3E cmpi.w [A5 - 0x1C2], 0x20 /* ' ' */
000008EA 6600 0006 bne +0x8 /* 000008F2 */
000008EE 4EAD 036A jsr [A5 + 0x36A /* export_105 */]
label000008F2:
000008F2 0C6D 000D FE3E cmpi.w [A5 - 0x1C2], 0xD /* '\r' */
000008F8 6600 0006 bne +0x8 /* 00000900 */
000008FC 4EAD 0372 jsr [A5 + 0x372 /* export_106 */]
label00000900:
00000900 4E5E unlink A6
00000902 4E75 rts
